rulesystem G extends "MoC" with "wedding/Guests" {
  rule annotate_friends {
    p:person; h:host;
    if       { p.gender == h.gender; }
    negative { p -:friendOf-> h; }
    modify   { p -:friendOf-> h; }
  }
  rule annotate_parents {
    ht:_text_ -:childOf-> h:host;
    ffnt:_text_ -:childOf-> ffn:firstName -:childOf-> f:person;
    mfnt:_text_ -:childOf-> mfn:firstName -:childOf-> m:person;
    if {
      (  (ht.content == "Christine Mueller" && ffnt.content == "Jutta" && mfnt.content == "Alfred")
      || (ht.content == "Normen Mueller"    && ffnt.content == "Ursel" && mfnt.content == "Klaus")
      );
    }
    negative { h -:hasParents-> :Infom; }
    modify {
      p:parents;
      h -:hasParents-> p;
      f -:isMother-> p;
      m -:isFather-> p;
    }
  }
}
